Nuprl Definition : ecl-act 11,40

ecl-act(dsdamx)
== ecl_ind(x;
== ecl_ind(k,test.(L.False);
== ecl_ind(a,b,aa,ab.(L.(aa(L))
== ecl_ind( (L1,L2:event-info(ds;da) List
== ecl_ind( (((L = append(L1L2))  (ecl-halt(dsdaa)(0,L1))  (ab(L2)))));
== ecl_ind(a,b,aa,ab.(L.((aa(L))
== ecl_ind( (L':(event-info(ds;da) List), n:.
== ecl_ind( iseg(event-info(ds;da); L'L (ecl-halt(dsdab)(n,L'))  (L' = L)))
== ecl_ind( ((ab(L))
== ecl_ind(  (L':(event-info(ds;da) List), n:.
== ecl_ind(  iseg(event-info(ds;da); L'L (ecl-halt(dsdaa)(n,L'))  (L' = L))));
== ecl_ind(a,b,aa,ab.(L.((aa(L))
== ecl_ind( (L':(event-info(ds;da) List), n:.
== ecl_ind( iseg(event-info(ds;da); L'L (ecl-halt(dsdab)(n,L'))  (L' = L)))
== ecl_ind( ((ab(L))
== ecl_ind(  (L':(event-info(ds;da) List), n:.
== ecl_ind(  iseg(event-info(ds;da); L'L (ecl-halt(dsdaa)(n,L'))  (L' = L))));
== ecl_ind(a,aa.star-append(event-info(ds;da); (ecl-halt(dsdaa)(0)); aa);
== ecl_ind(a,n,aa.if (m = n) then ecl-halt(dsdaa)(0) else aa fi ;
== ecl_ind(a,n,aa.aa;
== ecl_ind(a,l,aa.aa
latex



clarification:

ecl-act(dsdamx)
== ecl_ind(x;
== ecl_ind(k,test.(L.False);
== ecl_ind(a,b,aa,ab.(L.(aa(L))
== ecl_ind( (L1:event-info(ds;da) List
== ecl_ind( (L2:event-info(ds;da) List
== ecl_ind( (((L = append(L1L2 (event-info(ds;da) List))
== ecl_ind( ( (ecl-halt(dsdaa)(0,L1))
== ecl_ind( ( (ab(L2)))));
== ecl_ind(a,b,aa,ab.(L.((aa(L))
== ecl_ind( (L':(event-info(ds;da) List), n:.
== ecl_ind( iseg(event-info(ds;da); L'L)
== ecl_ind(  (ecl-halt(dsdab)(n,L'))
== ecl_ind(  (L' = L  (event-info(ds;da) List))))
== ecl_ind( ((ab(L))
== ecl_ind(  (L':(event-info(ds;da) List), n:.
== ecl_ind(  iseg(event-info(ds;da); L'L)
== ecl_ind(   (ecl-halt(dsdaa)(n,L'))
== ecl_ind(   (L' = L  (event-info(ds;da) List)))));
== ecl_ind(a,b,aa,ab.(L.((aa(L))
== ecl_ind( (L':(event-info(ds;da) List), n:.
== ecl_ind( iseg(event-info(ds;da); L'L)
== ecl_ind(  (ecl-halt(dsdab)(n,L'))
== ecl_ind(  (L' = L  (event-info(ds;da) List))))
== ecl_ind( ((ab(L))
== ecl_ind(  (L':(event-info(ds;da) List), n:.
== ecl_ind(  iseg(event-info(ds;da); L'L)
== ecl_ind(   (ecl-halt(dsdaa)(n,L'))
== ecl_ind(   (L' = L  (event-info(ds;da) List)))));
== ecl_ind(a,aa.star-append(event-info(ds;da); (ecl-halt(dsdaa)(0)); aa);
== ecl_ind(a,n,aa.if (m = n) then ecl-halt(dsdaa)(0) else aa fi ;
== ecl_ind(a,n,aa.aa;
== ecl_ind(a,l,aa.aa
latex


Definitionsecl ind, False, x:AB(x), append(asbs), , x.A(x), P  Q, P  Q, x:AB(x), , iseg(Tl1l2), P  Q, s = t, type List, star-append(TPQ), event-info(ds;da), if b then t else f fi , (i = j), f(a), ecl-halt(dsdax), #$n
FDL editor aliasesecl-act

origin